home *** CD-ROM | disk | FTP | other *** search
/ Kit PC World De Ampliacion De Windows 95 / Kit PC World de ampliacion de Windows 95.iso / lotus / lotus025.dsk / FINDREPL.LSS < prev    next >
Text File  |  1995-07-31  |  386b  |  16 lines

  1.     .Type "This is a sample.[Enter]"
  2.     .Type "This is another sample."
  3.     
  4.     .FindAndReplace.FindString = "sample"
  5.     .FindAndReplace.ReplaceString = "script sample"
  6.     .InitFindAndReplace True
  7.     
  8.     REM 0 = Found, 4 = NotFound    
  9.     If .Find = 0 Then Messagebox "Found the first item.",, "Skipping"
  10.     
  11.     REM Find the next instance    
  12.     .Find
  13.     
  14.     REM Replace the rest of the words    
  15.     .ReplaceAll
  16.